home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1995 #5 & #6
/
Amiga Plus CD - 1995 - No. 5 and 6.iso
/
pd
/
serien
/
purity
/
nr.46
/
forum
/
kp-mp3-fehler
< prev
next >
Wrap
Text File
|
1995-03-07
|
2KB
|
78 lines
Yho, hier habe ich einige Fehler in KickPascal 2.12/OS2-Includes
und MaxonPASCAL 3.00/OS3.1-Includes
aufgelistet, PackMAN.
----------------------------------------------------------------------
Includes/intuition.lib
Zeile 37: muß es "p_Requester" also so heißen:
-156 : PROCEDURE ModifyProp(A0:p_Gadget; A1:p_Window;
A2:p_Requester; D0,D1,D2,D3,D4:Long)
----------------------------------------------------------------------
Includes/Workbench/startup.h
Includedatei muß folgendermaßen aussehen:
{$if not def WORKBENCH_STARTUP_H} CONST WORKBENCH_STARTUP_H=0;
{*********************************************************************
** KickPascal-Include-Datei "Workbench/Startup.h" zu Kickstart 3.0 **
********************************************************************* }
{richtiggestellte Version von: Falk Zühlsdorff (PackMAN) 22.06.1994
bereits unter KP2.12/OS2-Includes falsch, vergl. RKRM_Libraries S.348}
TYPE p_WBStartup = ^WBStartup;
TYPE p_WBArg = ^WBArg;
{$if not def EXEC_PORTS_H;incl "exec/ports.h";endif}
{$if not def LIBRARIES_DOS_H;incl "libraries/dos.h";endif}
TYPE WBArg = RECORD
wa_Lock : BPTR;
wa_Name : Str;
END;
TYPE WBStartup = RECORD
sm_Message : Message;
sm_Process : p_MsgPort;
sm_Segment : BPTR; {Fehler: sm_ArgList : p_WBArg;}
sm_NumArgs : Long;
sm_ToolWindow : Str;
sm_ArgList : ^ARRAY[1..MAXINT] OF WBArg;
END;
{$endif}
----------------------------------------------------------------------
Include/intuition/screen.h
die Lösung für die Sache mit DrawInfo.dri_Pens:^Word ist auf #40.
----------------------------------------------------------------------
Include/graphics/rastport.h
TYPE GelsInfo = RECORD
sprRsrvd : Short; {---> muß BYTE sein}
... {Ltd. RKRM etc.}
END;
---------------------------------------------------------------------
Include/locale.lib
Bei Offset 78 (Zeile 27) muß es p_locale und nicht p_catalog heißen:
-78 : Function GetLocaleStr( A0 : p_Locale; D0 : Long) : Str;
---------------------------------------------------------------------